Sequential search in visual basic